In [2]:
using QuadGK, Plots, Roots, ForwardDiff, Interpolations, LaTeXStrings, Polynomials, PlotlyJS
using SpecialFunctions, LinearAlgebra
xb=10
RR=5
Gamma = 1.22542
masa=100 #100
rho0 = masa/(2 *sqrt(2)*1.22542*pi*RR^3 )*0.1 ### zmienione zostalo o 0.05
G=1
gamma=0.23
delta=4*sqrt(3)*pi*0.23
plotlyjs()
#gr()
function energydensityNH(x0)
return rho0*exp(-x0^2/(2*RR^2))
end
function energydensityOS(x0)
if x0<=10
ret = rho0
elseif x0>10
ret = 0
end
return ret
end
function Beta0(x0)
#return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * quadgk(x->x^2*rho0*exp(-x^2/(2*RR^2)),0,x0)[1] ) )
#end
#function Beta0(x0)
#if x0<=10
#return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * (x0^3)/3*rho0 ) )
# elseif x0>10
# return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * (10^3)/3*rho0 ) )
# end
#return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * quadgk(x->x^2*energydensityOS(x),0,x0)[1] ) )
#return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * quadgk(x->x^2*rho0*exp(-x^2/(2*RR^2)),0,x0)[1] ) )
return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * rho0*(-exp(-x0^2/(2*RR^2))*RR^2*x0 +sqrt(pi/2)*RR^3*erf(x0/(sqrt(2)*RR )) ) ) )
end
function atan2(xx)
if xx<0
return atan(xx) +pi
else
return atan(xx)
end
end
function beta(lam,beta0)
return -atan2(1/(1/2*(-3*lam-2*1/tan(beta0)) ))
end
function x(lam, x0)
beta0=Beta0(x0)
return (x0*(4+9*lam^2 + 12*lam*1/tan(beta0) +4*1/(tan(beta0))^2 )^(1/3))/(2^(2/3) * (1+ 1/(tan(beta0))^2 )^(1/3) )
end
function t(lam)
return gamma*sqrt(delta)*lam
end
function lambda(t)
return t/(gamma*sqrt(delta))
end
function szift(lam, x0)
return -x(lam,x0)/(gamma*sqrt(delta))*sin(beta(lam,Beta0(x0)))*cos(beta(lam,Beta0(x0)))
end
#function xprim(lam, x0)
#beta0=Beta0(x0)
#function xx(lam)
#return (x0*(4+9*lam^2 + 12*lam*1/tan(beta0) +4*1/(tan(beta0))^2 )^(1/3))/(2^(2/3) * (1+ 1/(tan(beta0))^2 )^(1/3) )
#end
#xp = ForwardDiff.derivative(xx,lam)
#return xp
#end
function xprim(lam, x0)
return x(lam, x0)*cos(beta(lam,Beta0(x0)))*sin(beta(lam,Beta0(x0)))
end
#Plots.plot(range(-30,30,length=1000),[lam->x(lam,15),lam->xprim(lam,15)])
function tprim(lam)
return gamma*sqrt(delta)
end
function Beta0prim(x0)
return ForwardDiff.derivative(Beta0,x0)
end
Plots.plot(range(-100,100,length=1000), lam -> beta(lam, Beta0(10)) )
The WebIO Jupyter extension was not detected. See the WebIO Jupyter integration documentation for more information.
Out[2]:
In [3]:
Beta0(10)
Out[3]:
-0.07528928207329234
In [4]:
Plots.plot(range(0.1,35,length=500),x0->energydensityNH(x0) )
Plots.plot!(range(0.1,35,length=500),x0->energydensityOS(x0) )
Out[4]:
In [5]:
Plots.plot(range(0,15,length=500),x0->Beta0(x0))
Out[5]:
In [6]:
p=Plots.plot()
for x01 in range(0,15,length=60)
Plots.plot!(range(0,50,length=500),l->x(l,x01))
end
display(p)
In [7]:
Plots.plot(range(0,50,length=500),l->x(l,1e-6))
Plots.plot!(range(0,50,length=500),l->x(l,10))
Plots.plot!(range(0,50,length=500),l->x(l,11))
Out[7]:
In [8]:
function fff(lam, x0)
return -1/(1-szift(lam,x0))
end
function derfpox0(lam,x0)
function test(x0)
return fff(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end
function derxpox0(lam, x0)
gamma1=0.23
rr=RR
x0=x0+im*0
lam=lam+im*0
rr=RR
ret=(-1 * rr ^ -1 * x0 ^ 2 * ((-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1) ^ (2//3) * ((2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (-1 * (x0 ^ 3 + 9 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * lam ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1)) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 6 * gamma1 * lam * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-(1//2) * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 18 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * lam ^ 2 * rr ^ 2)) ^ (-2//3) * (G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) ^ (-1//2) * (x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) ^ (-1//2) * (-1 * rr * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-(1//2) * rr ^ -2 * x0 ^ 2)) * (6 * pi * G * delta * rho0 * gamma1 ^ 2 * lam ^ 2 + exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp((1//4) * rr ^ -2 * x0 ^ 2) + 2 * G * delta * gamma1 * lam * rho0 * x0 * sqrt(pi) * ((x0 ^ 2 + -3 * rr ^ 2) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 16 * pi * G * delta * rho0 * gamma1 ^ 2 * rr ^ 2) + pi * G * delta * gamma1 * lam * rho0 * sqrt(2) * rr ^ 3 * (3 * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -16 * pi * G * delta * rho0 * gamma1 ^ 2) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp(-(5//12) * rr ^ -2 * x0 ^ 2))
return real(ret)
end
function derxpox02(lam, x0)
function test(x0)
return x(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end
function derPRAWOpolam(lam, x0)
function test(lam)
return fff(lam,x0)*derxpox0(lam, x0)
end
return ForwardDiff.derivative(test, lam)
end
function derxpox0polam2(lam, x0)
function test(lam)
return derxpox0(lam, x0)
end
return ForwardDiff.derivative(test, lam)
end
function derxpox0polam(lam, x0)
gamma1=0.23
rr=RR
x0=x0+im*0
lam=lam+im*0
rr=RR
ret=(-1 * rr ^ -1 * x0 ^ 2 * ((-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1) ^ (2//3) * ((2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (-1 * (x0 ^ 3 + 9 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * lam ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1)) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 6 * gamma1 * lam * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 18 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * lam ^ 2 * rr ^ 2)) ^ (-2//3) * (G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) ^( -1//2) * (x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^( 3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) ^ (-1//2) * (2 * G * delta * gamma1 * rho0 * x0 * sqrt(pi) * ((x0 ^ 2 + -3 * rr ^ 2) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 16 * pi * G * delta * rho0 * gamma1 ^ 2 * rr ^ 2) + pi * G * delta * gamma1 * rho0 * sqrt(2) * rr ^ 3 * (3 * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -16 * pi * G * delta * rho0 * gamma1 ^ 2) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -12 * pi * G * delta * lam * rho0 * rr * gamma1 ^ 2 * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^( 3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2)) * exp(-5//12 * rr ^ -2 * x0 ^ 2) + (2//3) * rr ^ -1 * x0 ^ 2 * ((-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1) ^( 2//3) * ((2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (-1 * (x0 ^ 3 + 9 * G * delta * rho0 * sqrt(2) * pi ^( 3//2) * gamma1 ^ 2 * lam ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1)) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 6 * gamma1 * lam * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 18 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * lam ^ 2 * rr ^ 2)) ^ (-5//3) * (G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) ^ (-1//2) * (2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) ^( -1//2 ) * (-1 * rr * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * (6 * pi * G * delta * rho0 * gamma1 ^ 2 * lam ^ 2 + exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 2 * G * delta * gamma1 * lam * rho0 * x0 * sqrt(pi) * ((x0 ^ 2 + -3 * rr ^ 2) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 16 * pi * G * delta * rho0 * gamma1 ^ 2 * rr ^ 2) + pi * G * delta * gamma1 * lam * rho0 * sqrt(2) * rr ^ 3 * (3 * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -16 * pi * G * delta * rho0 * gamma1 ^ 2) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * (6 * gamma1 * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 36 * pi * G * delta * lam * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 + -18 * G * delta * lam * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp(-5//12 * rr ^ -2 * x0 ^ 2))
return real(ret)
end
@time [derxpox0polam(-10, 1), derxpox0polam2(-10, 1)]
0.639716 seconds (585.37 k allocations: 39.616 MiB, 2.17% gc time, 99.42% compilation time)
Out[8]:
2-element Vector{Float64}:
-0.08809252812928256
-0.08809252812928142
In [9]:
using DifferentialEquations
xpoczU=7.5
function rozwiazanie(s1,lamstar)
if s1<0
function calyproblem(du, u, p, s)
du[1] = -derxpox0(u[1], u[2])
du[2] = -gamma*sqrt(delta)
du[3] = u[3]*derxpox0polam(u[1], u[2])
end
u0 = [lamstar; xpoczU; -1/(1-szift(lamstar,xpoczU))]
sspan=(0,-s1 )
prob3 = ODEProblem(calyproblem, u0, sspan, abstol = 1e-4, reltol = 1e-4)
sol3 = solve(prob3)
return sol3(-s1)
elseif s1>=0
function calyproblem2(du, u, p, s)
du[1] = derxpox0(u[1], u[2])
du[2] = gamma*sqrt(delta)
du[3] = -u[3]*derxpox0polam(u[1], u[2])
end
u02 = [lamstar; xpoczU; -1/(1-szift(lamstar,xpoczU))]
sspan2=(0,s1 ) # 0 20
prob32 = ODEProblem(calyproblem2, u02, sspan2, abstol = 1e-4, reltol = 1e-4)
sol32 = solve(prob32)
return sol32(s1)
end
end
#i1=-40
#Plots.plot( s-> rozwiazanie(s,i1)[2], s->rozwiazanie(s,i1)[1], range(-20,10,length=500) )
#@time rozwiazanie(10,10)
i1=5
@time Plots.plot( s-> rozwiazanie(s,i1)[2], s->rozwiazanie(s,i1)[1], range(-15,35,length=500) )
24.179622 seconds (259.65 M allocations: 7.408 GiB, 7.03% gc time, 27.62% compilation time: 7% of which was recompilation)
Out[9]:
In [10]:
rozwiazanie(25,30)[2]
Out[10]:
20.36521381418836
In [11]:
function lambda1(s,lamstar)
return rozwiazanie(s,lamstar)[1]
end
function sodx0(x0)
return (x0-xpoczU)/(gamma*sqrt(delta))
end
function lamstar1(x0, lambda)
s=sodx0(x0)
tab1=range(-450,450,length=1000)
tab2=lambda1.(s,tab1)
itp=linear_interpolation(tab2,tab1)
return itp(lambda)
end
function lamstar2(x0, lambda)
s=sodx0(x0)
function test(l)
return lambda1(s,l)-lambda
end
ret=find_zero(test,(-450,450))
return ret
end
function Ffinal(lam, x0)
ret = rozwiazanie(sodx0(x0),lamstar2(x0,lam))[3]
return ret
end
#@time Ffinal(1,1)
Out[11]:
Ffinal (generic function with 1 method)
In [12]:
#Plots.plot(range(-30,30,length=500), l->lamstar2(1e-6,l))
In [13]:
function derFpox0(lam,x0)
function test(x0)
return Ffinal(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end
function derFpox02(lam,x0)
function test(x0)
return Ffinal(lam, x0)
end
dx0=1e-6
return (test(x0+dx0)-test(x0))/dx0
end
function derF_PRAWOpolam(lam, x0)
function test(lam)
return Ffinal(lam,x0)*derxpox0(lam, x0)
end
dlam=1e-6
return (test(lam+dlam)-test(lam))/dlam
end
#lam1=15
#@time Plots.plot(range(0.1,15,length=500), x0-> gamma*sqrt(delta)*derFpox02(lam1,x0)+derF_PRAWOpolam(lam1, x0), ylims=(-10,10))
Out[13]:
derF_PRAWOpolam (generic function with 1 method)
In [14]:
function Fslam(s,lamstar)
return rozwiazanie(s,lamstar)[3]
end
function FslamS(lamstar)
return -1/(1-szift(lamstar,xpoczU))
end
function intelamstarU(lamstar)
s=0
return FslamS(lamstar)*(-1)*gamma*sqrt(delta)
end
function oneoverintelamstarU(lamstar)
return 1/intelamstarU(lamstar)
end
function bisection(f, a, b, tol)
if sign(f(a)) == sign(f(b))
error("function has the same sign at given endpoints")
end
mid = (a + b)/2
while abs(f(mid)) > tol
sign(f(mid)) == sign(f(a)) ? a=mid : b=mid
mid = (a + b)/2
end
return mid
end
lamstar_zero1 = bisection(oneoverintelamstarU, -30, -10, 1e-14)
lamstar_zero2 = bisection(oneoverintelamstarU, -10, 30, 1e-12)
#Plots.plot(range(20,30,length=500), lamstar -> intelamstarU(lamstar) )
function calklamstarU(lamstar1)
if lamstar_zero1<lamstar1<lamstar_zero2
calk=quadgk(lamstar->intelamstarU(lamstar),0,lamstar1)[1]
elseif lamstar1<lamstar_zero1
calk=(quadgk(lamstar->intelamstarU(lamstar),0,lamstar_zero1+1e-7)[1] +
quadgk(lamstar->intelamstarU(lamstar),lamstar_zero1-1e-7,lamstar1)[1] )
elseif lamstar_zero2<lamstar1
calk=(quadgk(lamstar->intelamstarU(lamstar),0,lamstar_zero2-1e-9)[1] +
quadgk(lamstar->intelamstarU(lamstar),lamstar_zero2+1e-9,lamstar1)[1] )
end
return calk
end
function ufinalSlam(lamstar)
return 0+ calklamstarU(lamstar) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end
function ufinalin(l, x0)
return 0+ calklamstarU(lamstar2(x0,l)) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end
#Plots.plot(range(-30,30, length=500), lamstar->ufinalSlam(lamstar) )
#@time ufinalin(50, 10)
#lamstar2(1,1)
@time Plots.plot(range(-30,30, length=500), lamstar->ufinalSlam(lamstar) )
5.753469 seconds (69.21 M allocations: 1.272 GiB, 4.26% gc time, 50.77% compilation time: <1% of which was recompilation)
Out[14]:
In [15]:
@time Plots.plot(range(-30,30, length=150), lamstar-> oneoverintelamstarU(lamstar) )
0.069498 seconds (53.08 k allocations: 2.814 MiB, 97.66% compilation time)
Out[15]:
In [16]:
xpoczV=15
function rozwiazanieV(s1,lamstar)
if s1<0
function calyproblem(du, u, p, s)
du[1] = -derxpox0(u[1], u[2])
du[2] = gamma*sqrt(delta)
du[3] = u[3]*derxpox0polam(u[1], u[2])
end
u0 = [lamstar; xpoczV; 1/(1+szift(lamstar,xpoczV))]
sspan=(0,-s1 )
prob3 = ODEProblem(calyproblem, u0, sspan, abstol = 1e-4, reltol = 1e-4)
sol3 = solve(prob3)
return sol3(-s1)
elseif s1>=0
function calyproblem2(du, u, p, s)
du[1] = derxpox0(u[1], u[2])
du[2] = -gamma*sqrt(delta)
du[3] = -u[3]*derxpox0polam(u[1], u[2])
end
u02 = [lamstar; xpoczV; 1/(1+szift(lamstar,xpoczV))]
sspan2=(0,s1)
prob32 = ODEProblem(calyproblem2, u02, sspan2, abstol = 1e-4, reltol = 1e-4)
sol32 = solve(prob32)
return sol32(s1)
end
end
plotlyjs()
pv=Plots.plot()
for i1 in range(-30,30,length=10)
@time Plots.plot!( s-> rozwiazanieV(s,i1)[2], s->rozwiazanieV(s,i1)[1], range(-35,29.5,length=150) )
end
display(pv)
1.263062 seconds (10.26 M allocations: 304.893 MiB, 5.15% gc time, 39.60% compilation time: <1% of which was recompilation) 0.714682 seconds (9.86 M allocations: 271.030 MiB, 3.82% gc time) 0.755356 seconds (10.47 M allocations: 287.367 MiB, 3.91% gc time) 0.904169 seconds (12.67 M allocations: 346.788 MiB, 3.24% gc time) 1.303921 seconds (18.20 M allocations: 495.903 MiB, 3.98% gc time) 1.913248 seconds (26.62 M allocations: 723.899 MiB, 3.88% gc time) 2.651637 seconds (36.22 M allocations: 984.162 MiB, 3.39% gc time) 2.354141 seconds (31.47 M allocations: 855.940 MiB, 3.81% gc time) 0.768189 seconds (10.34 M allocations: 284.021 MiB, 3.81% gc time) 0.751630 seconds (9.89 M allocations: 271.932 MiB, 2.64% gc time)
In [17]:
function lambda1V(s,lamstar)
return rozwiazanieV(s,lamstar)[1]
end
function sodx0V(x0)
return (xpoczV-x0)/(gamma*sqrt(delta))
end
function lamstar1V(x0, lambda)
s=sodx0V(x0)
tab1=range(-550,950,length=1000)
tab2=lambda1V.(s,tab1)
itp=linear_interpolation(tab2,tab1)
return itp(lambda)
end
function lamstar2V(x0, lambda)
s=sodx0V(x0)
function test(l)
return lambda1V(s,l)-lambda
end
ret=find_zero(test,(-1150,950))
return ret
end
#lamstar1(1,lambda1(-5,21))
#x001=0.05
#lamstar1V(x001,lambda1(sodx0(x001),100))
function FfinalV(lam, x0)
if x0<10
ret = rozwiazanieV(sodx0V(x0),lamstar2V(x0,lam))[3]
return ret
elseif x0>=10
return 1/(1+szift(lam,x0))
end
end
Out[17]:
FfinalV (generic function with 1 method)
In [18]:
function derFpox0V(lam,x0)
function test(x0)
return FfinalV(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end
function derFpox02V(lam,x0)
function test(x0)
return FfinalV(lam, x0)
end
dx0=1e-6
return (test(x0+dx0)-test(x0))/dx0
end
function derF_PRAWOpolamV(lam, x0)
function test(lam)
return FfinalV(lam,x0)*derxpox0(lam, x0)
end
dlam=1e-6
return (test(lam+dlam)-test(lam))/dlam
end
Out[18]:
derF_PRAWOpolamV (generic function with 1 method)
In [19]:
lam1=5
#@time Plots.plot(range(0.1,40,length=500), x0-> -gamma*sqrt(delta)*derFpox02V(lam1,x0)+derF_PRAWOpolamV(lam1, x0),
# ylims=(-10,10))
Out[19]:
5
In [20]:
function FslamV(s,lamstar)
return rozwiazanieV(s,lamstar)[3]
end
function FslamSV(lamstar)
return 1/(1+szift(lamstar,xpoczV))
end
function intelamstarV(lamstar)
s=0
return FslamSV(lamstar)*gamma*sqrt(delta)
end
function oneoverintelamstarV(lamstar)
return 1/intelamstarV(lamstar)
end
#Plots.plot(range(-20,30,length=500), lamstar -> oneoverintelamstarV(lamstar))
Vlamstar_zero1 = bisection(oneoverintelamstarV, 10, 40, 1e-12)
Vlamstar_zero2 = bisection(oneoverintelamstarV, 40, 90, 1e-12)
function calklamstarV(lamstar1)
if lamstar1<Vlamstar_zero1
calk=quadgk(lamstar->intelamstarV(lamstar),0,lamstar1)[1]
elseif Vlamstar_zero1<lamstar1<Vlamstar_zero2
calk=(quadgk(lamstar->intelamstarV(lamstar),0,Vlamstar_zero1-1e-9)[1] +
quadgk(lamstar->intelamstarV(lamstar),Vlamstar_zero1+1e-9,lamstar1)[1] )
elseif Vlamstar_zero2<lamstar1
calk=(quadgk(lamstar->intelamstarV(lamstar),0,Vlamstar_zero1-1e-9)[1] +
quadgk(lamstar->intelamstarV(lamstar),Vlamstar_zero1+1e-9,Vlamstar_zero2-1e-7)[1]
+quadgk(lamstar->intelamstarV(lamstar),Vlamstar_zero2+1e-7,lamstar1)[1] )
end
return calk
end
function vfinalSlam(lamstar)
return 0+ calklamstarV(lamstar) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end
function vfinalin(l, x0)
return 0+ calklamstarV(lamstar2V(x0,l)) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end
#@time Plots.plot(range(-40,40,length=500), l->vfinalin(l, 10) )
Plots.plot(range(-30,40,length=500) ,lamstar->oneoverintelamstarV(lamstar))
Out[20]:
In [21]:
#Plots.plot(range(-130,130,length=500) ,lamstar->vfinalSlam(lamstar))
Plots.plot(range(-30,40,length=500) ,lamstar->oneoverintelamstarV(lamstar))
Out[21]:
In [22]:
Ax0=5
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)
vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)
[ulamsin1,ulamsin2,vlamsin1,vlamsin2]
Out[22]:
4-element Vector{Float64}:
-19.368613583731804
3.9370764793202913
6.764536675304572
70.8751797781234
In [23]:
############### SHELL CROSSING SIN
#using SymPy
#const sympy_parsing_mathematica = SymPy.PyCall.pyimport("sympy.parsing.mathematica")
function delta0(x0)
Mdelta=delta
Mgamma=gamma
Mrho=rho0
G=1
ret=(1//5 * G * Mdelta * Mrho * sqrt(pi) * Mgamma ^ 2 * x0 ^ -4 * (G * Mdelta * Mrho * Mgamma ^ 2 * x0 ^ -3 * (-2 * x0 * exp(-1//50 * x0 ^ 2) + 5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)))) ^ (-1//2) * (1 + 100 * pi * G * Mdelta * Mrho * Mgamma ^ 2 * x0 ^ -3 * (2 * x0 * exp(-1//50 * x0 ^ 2) + -5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)))) ^( -1//2) * (-2 * x0 * (75 + x0 ^ 2) + 375 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)) * exp(1//50 * x0 ^ 2)) * exp(-1//50 * x0 ^ 2))
return ret
end
#s = "(1080000000*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^2*Mrho0^2*Pi^(10/3)*x0^4*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 607500000*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^4*Mrho0^2*Pi^(10/3)*x0^4*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 8100000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(7/3)*x0^6*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 3000*E^((3*x0^2)/50)*Pi^(4/3)*x0^8*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 5400000000*Sqrt[2]*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^2*Mrho0^2*Pi^(23/6)*x0^3*Erf[x0/(5*Sqrt[2])]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 3037500000*Sqrt[2]*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^4*Mrho0^2*Pi^(23/6)*x0^3*Erf[x0/(5*Sqrt[2])]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 20250000*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(17/6)*x0^5*Erf[x0/(5*Sqrt[2])]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 13500000000*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^2*Mrho0^2*Pi^(13/3)*x0^2*Erf[x0/(5*Sqrt[2])]^2*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 7593750000*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^4*Mrho0^2*Pi^(13/3)*x0^2*Erf[x0/(5*Sqrt[2])]^2*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 81000000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^3*Mrho0*Pi^(17/6)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 180000*E^((3*x0^2)/50)*Mlam*Pi^(11/6)*x0^8*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 202500000*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^3*Mrho0*Pi^(10/3)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/((-144000000*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (81000000*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^4*Mrho0*Pi^(3/2)*x0^4*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (1080000*2^(5/6)*E^(x0^2/25)*Mlam^2*Sqrt[Pi]*x0^6*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (400*2^(5/6)*E^((3*x0^2)/50)*x0^8*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/(G*Mdelta*Mgamma^2*Mrho0*Sqrt[Pi]*(E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (1440000000*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (810000000*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^4*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (5400000*2^(1/3)*E^((3*x0^2)/50)*Mlam^2*Pi*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (1800000000*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*x0^2*Erf[x0/(5*Sqrt[2])]^2*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (1012500000*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^4*Mrho0*Pi^(5/2)*x0^2*Erf[x0/(5*Sqrt[2])]^2*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (10800000*2^(5/6)*E^(x0^2/25)*Mlam^3*Pi*x0^6*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (24000*2^(5/6)*E^((3*x0^2)/50)*Mlam*x0^8*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/(G*Mdelta*Mgamma^2*Mrho0*(E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (54000000*2^(1/3)*E^((3*x0^2)/50)*Mlam^3*Pi^(3/2)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (24000*2^(1/3)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(4/3)*x0^3*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 + (180000*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(11/6)*x0^2*Erf[x0/(5*Sqrt[2])]*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 - (900000*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(7/3)*x0*Erf[x0/(5*Sqrt[2])]^2*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 + (750000*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(17/6)*Erf[x0/(5*Sqrt[2])]^3*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 - (800*2^(1/3)*E^(x0^2/50)*Pi^(5/6)*x0^5*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 + (4000*2^(5/6)*E^(x0^2/25)*Pi^(4/3)*x0^4*Erf[x0/(5*Sqrt[2])]*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 - (10000*2^(1/3)*E^((3*x0^2)/50)*Pi^(11/6)*x0^3*Erf[x0/(5*Sqrt[2])]^2*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)"
#ex = sympy_parsing_mathematica.mathematica(s,Dict("Erf[x]"=>"erf(x)","Gamma[x]"=>"Gamma(x)") )
#f_expr = SymPy.SymPyCore.walk_expression(Sym(ex))
#Mdelta=4*sqrt(3)*pi*0.23
#G=1
#Mgamma=gamma
#Mrho0=rho0
# :(((x + y) ^ 3) ^ -1//2)
#@generated DELTAfinal(Mlam,x0) = f_expr
############# NUMERYCZNIE
using DifferentialEquations
#x01=5
#lfin=deninf(5)+0.474
function deltaNUM(l1,x0)
function rowdelta(du, u, p, l)
du[1]=-2*sin(2*beta(l, Beta0(x0)))*u[1]-x(l, x0)*cos(2*beta(l, Beta0(x0)))*u[1]^2
end
u0=[delta0(x0)]
lspan=(0,20 )
prob=ODEProblem(rowdelta,u0, lspan,maxiters=100 )
sol1=solve(prob)
return sol1(l1)[1]
end
function deltaNUM(l1,x0)
function rowdelta(du, u, p, l)
du[1]=-2*sin(2*beta(l, Beta0(x0)))*u[1]-x(l, x0)*cos(2*beta(l, Beta0(x0)))*u[1]^2
end
u0=[delta0(x0)]
lspan=(0,160 )
condition(u,t,integrator) = u[1] - 1e9 # Is zero when u[3] = 10
affect!(integrator) = terminate!(integrator)
cb = ContinuousCallback(condition,affect!)
prob=ODEProblem(rowdelta,u0, lspan,callback = cb, reltol=1e-4,abstol=1e-4 )
sol1=solve(prob)
return sol1(l1)[1]
end
function lamshell(x0)
function test(l1)
return deltaNUM(l1,x0)-1e8
end
return find_zero(test,(0,1000) )[1]
end
#deltaNUM(10,5)
function lamshell2(x0)
Mdelta=delta
Mrho0=rho0
G=1
Mgamma=gamma
ret = (1//15 * pi ^ (-1//2) * (-1 * G * Mdelta * Mrho0 * Mgamma ^ 2 * x0 ^ -3 * (2x0 + -5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)) * exp(1//50 * x0 ^ 2)) * exp(-1//50 * x0 ^ 2)) ^ (-1//2) * sqrt(1 + 100 * pi * G * Mdelta * Mrho0 * Mgamma ^ 2 * x0 ^ -3 * (2 * x0 * exp(-1//50 * x0 ^ 2) + -5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)))))
return ret
end
function density(l,x0)
ret = 3*sin(beta(l,Beta0(x0)))^2/(8*pi*G*gamma^2*delta) + x(l,x0)*cos(beta(l,Beta0(x0)))*sin(beta(l,Beta0(x0)))*deltaNUM(l,x0)/(4*pi*G*gamma^2*delta)
return ret
end
#lamshell(24.5)
#lamshell(15)
@time Plots.plot( range(5,20,length=150), x0->lamshell(x0) )
35.761424 seconds (612.66 M allocations: 11.032 GiB, 3.66% gc time, 12.00% compilation time)
Out[23]:
In [24]:
x01=5
x02=10
Plots.plot( range(0,30,length=500), l->deltaNUM(l,x01) )
Plots.plot!( range(0,50,length=500), l->deltaNUM(l,x02) )
Plots.scatter!( [lamshell(x01)], [deltaNUM(lamshell(x01),x01)], ylims=(0,1e9) )
Plots.scatter!( [lamshell(x02)], [deltaNUM(lamshell(x02),x02)], ylims=(0,1e9) )
#Plots.scatter!( [lamshell2(x01)], [deltaNUM(lamshell2(x01),x01)] )
#Plots.scatter!( [lamshell2(x02)], [deltaNUM(lamshell2(x02),x02)] )
Out[24]:
In [25]:
p=Plots.plot()
for x01 in range(1,15,length=50)
Plots.plot!(range(0,20,length=500),l->x(l,x01))
end
Plots.plot!( x0->lamshell(x0),x0->x(lamshell(x0),x0), range(5,15,length=50), color=:red )
display(p)
In [26]:
function minusNzeros(x0)
function test(lam)
return 1-szift(lam, x0)
end
lamtab1=range(-100,200,length=2000)
appalamtab=[]
for i1 in lamtab1
push!(appalamtab, test(i1))
end
miejsce=lamtab1[findmin(appalamtab)[2]]
return find_zeros(test, (miejsce-150,miejsce+150))
end
function plusNzeros(x0)
function test(lam)
return 1+szift(lam, x0)
end
lamtab1=range(-100,200,length=2000)
appalamtab=[]
for i1 in lamtab1
push!(appalamtab, test(i1))
end
miejsce=lamtab1[findmin(appalamtab)[2]]
return find_zeros(test, (miejsce-150,miejsce+450))
end
minusNzeros(7.5)
Out[26]:
2-element Vector{Float64}:
-10.73159370353197
6.884084906913793
In [27]:
function minusNzeros(x0)
function test(lam)
return 1-szift(lam, x0)
end
return find_zeros(test, (-50,100))
end
function plusNzeros(x0)
function test(lam)
return 1+szift(lam, x0)
end
return find_zeros(test, (-50,100))
end
st=3.06670
minusNzeros(st)
Out[27]:
2-element Vector{Float64}:
4.265568799571835
4.383291411784029
In [28]:
tabx01=range(st,20, length=550)
tablam1=[]
for i1 in 1:length(tabx01)
laa=minusNzeros(tabx01[i1])[1]
push!(tablam1,laa )
end
tabx02=range(st,20, length=550)
tablam2=[]
for i1 in 1:length(tabx02)
laa=minusNzeros(tabx02[i1])[2]
push!(tablam2,laa )
end
tabx03=range(st,20, length=550)
tablam3=[]
for i1 in 1:length(tabx03)
laa=plusNzeros(tabx03[i1])[1]
push!(tablam3,laa )
end
tabx04=range(st,20, length=550)
tablam4=[]
for i1 in 1:length(tabx04)
laa=plusNzeros(tabx04[i1])[2]
push!(tablam4,laa )
end
minusNzeros(15)
Out[28]:
2-element Vector{Float64}:
-22.166890512026313
14.002179739642441
In [29]:
minusNzeros(st)
Out[29]:
2-element Vector{Float64}:
4.265568799571835
4.383291411784029
In [30]:
Plots.plot(range(-30,30,length=500), l->1-szift(l,20))
Out[30]:
In [31]:
function lamsin1(x0)
ulamsin1=lambda1(sodx0(x0) ,lamstar_zero1)
return ulamsin1
end
function lamsin2(x0)
ulamsin2=lambda1(sodx0(x0) ,lamstar_zero2)
return ulamsin2
end
function lamsin3(x0)
vlamsin1=lambda1V(sodx0V(x0) ,Vlamstar_zero1)
return vlamsin1
end
function lamsin4(x0)
vlamsin2=lambda1V(sodx0V(x0) ,Vlamstar_zero2)
return vlamsin2
end
minusNzeros(40)
Out[31]:
2-element Vector{Float64}:
23.478510477650012
60.74800822420994
In [32]:
plotlyjs()
#pv
Plots.plot(range(0.1,25,length=500), x0->lamsin1(x0), linewidth=2)
Plots.plot!(range(0.1,25,length=500), x0->lamsin2(x0), linewidth=2)
Plots.plot!(range(0.1,25,length=500), x0->lamsin3(x0), linewidth=2)
Plots.plot!(range(0.1,25,length=500), x0->lamsin4(x0), linewidth=2)
Plots.plot!(range(st,25,length=500), x0->minusNzeros(x0)[1], color=:black)
Plots.plot!(range(st,25,length=500), x0->minusNzeros(x0)[2], color=:black)
Plots.plot!(range(st,25,length=500), x0->plusNzeros(x0)[1], color=:black)
Plots.plot!(range(st,25,length=500), x0->plusNzeros(x0)[2], color=:black)
Plots.plot!( range(4.895,25,length=150), x0->lamshell(x0), color=:red)
Out[32]:
In [33]:
function teest(x0)
return lamsin2(x0) - minusNzeros(x0)[1]
end
przec1=find_zeros(teest,(3.5,5))[1]
function teest2(x0)
return lamsin3(x0) - plusNzeros(x0)[2]
end
przec2=find_zeros(teest2,(st,4))[1]
Out[33]:
3.201083039489556
In [34]:
[xpoczU,przec1,st]
Out[34]:
3-element Vector{Float64}:
7.5
3.7824112690492
3.0667
In [35]:
kap=1/5
function APPatanufinal1M1(x0)
lam=minusNzeros(x0)[1]
return 1/pi*atan(kap*ufinalin(lam,x0))
end
function APPatanvfinal1M1(x0)
lam=minusNzeros(x0)[1]
return 1/pi*atan(kap*vfinalin(lam,x0))
end
function APPatanufinal2M1(x0)
lam=minusNzeros(x0)[1]
return -1/pi*atan(kap*ufinalin(lam,x0))+1
end
function APPatanufinal3M1(x0)
lam=minusNzeros(x0)[1]
return 1/pi*atan(kap*ufinalin(lam,x0))+2
end
function APPatanvfinal1M2(x0)
lam=minusNzeros(x0)[2]
return 1/pi*atan(kap*vfinalin(lam,x0))
end
function APPatanufinal3M2(x0)
lam=minusNzeros(x0)[2]
return 1/pi*atan(kap*ufinalin(lam,x0))+2
end
function APPatanufinal2M2(x0)
lam=minusNzeros(x0)[2]
return -1/pi*atan(kap*ufinalin(lam,x0))+1
end
### DOLNY HORYZONT
#Plots.plot(x0->APPatanvfinal1M1(x0)-APPatanufinal1M1(x0), x0->APPatanvfinal1M1(x0)+APPatanufinal1M1(x0), range(xpoczU+1e-7,15,length=50) )
#Plots.plot!(x0->APPatanvfinal1M1(x0)-APPatanufinal2M1(x0), x0->APPatanvfinal1M1(x0)+APPatanufinal2M1(x0), range(przec1+1e-7,xpoczU-1e-7,length=50) )
#Plots.plot!(x0->APPatanvfinal1M1(x0)-APPatanufinal3M1(x0), x0->APPatanvfinal1M1(x0)+APPatanufinal3M1(x0), range(st,przec1-1e-7,length=50) )
#Plots.plot!(x0->APPatanvfinal1M2(x0)-APPatanufinal3M2(x0), x0->APPatanvfinal1M2(x0)+APPatanufinal3M2(x0), range(st,xpoczU-1e-7,length=50) )
#Plots.plot!(x0->APPatanvfinal1M2(x0)-APPatanufinal2M2(x0), x0->APPatanvfinal1M2(x0)+APPatanufinal2M2(x0), range(xpoczU+1e-7,15,length=50) )
Out[35]:
APPatanufinal2M2 (generic function with 1 method)
In [36]:
#### PRECOMPUTING APPARENT DOLNY
t1ap= range(xpoczU+1e-7,15,length=50)
t2ap= range(przec1+1e-7,xpoczU-1e-7,length=50)
t3ap= range(st,przec1-1e-7,length=50)
t4ap= range(st,xpoczU-1e-7,length=50)
t5ap= range(xpoczU+1e-7,15,length=50)
vap1= APPatanvfinal1M1.(t1ap)
vap2= APPatanvfinal1M1.(t2ap)
vap3= APPatanvfinal1M1.(t3ap)
vap4= APPatanvfinal1M2.(t4ap)
vap5= APPatanvfinal1M2.(t5ap)
tapA=vcat(t3ap,t2ap,t1ap)
vapA=vcat(vap3,vap2,vap1)
tapB=vcat(t4ap,t5ap)
vapB=vcat(vap4,vap5)
vdolnyA = linear_interpolation(tapA,vapA)
vdolnyB = linear_interpolation(tapB,vapB)
uap1=APPatanufinal1M1.(t1ap)
uap2=APPatanufinal2M1.(t2ap)
uap3=APPatanufinal3M1.(t3ap)
uap4=APPatanufinal3M2.(t4ap)
uap5=APPatanufinal2M2.(t5ap)
uapA=vcat(uap3,uap2,uap1)
uapB=vcat(uap4,uap5)
udolnyA=linear_interpolation(tapA,uapA);
udolnyB = linear_interpolation(tapB,uapB);
In [37]:
Plots.plot(l->vdolnyA(l)-udolnyA(l),l->vdolnyA(l)+udolnyA(l) , tapA, aspectratio=1, color=:magenta )
l1=first(tapA)
l2=first(tapB)
Plots.plot!([vdolnyA(l1)-udolnyA(l1),vdolnyB(l2)-udolnyB(l2) ] ,[vdolnyA(l1)+udolnyA(l1),vdolnyB(l2)+udolnyB(l2)] , aspectratio=1, color=:magenta )
Plots.plot!(l->vdolnyB(l)-udolnyB(l),l->vdolnyB(l)+udolnyB(l) , tapB, aspectratio=1, color=:magenta )
Out[37]:
In [38]:
######## GORNY HORYZONT
function APPatanufinal3P1(x0)
lam=plusNzeros(x0)[1]
return 1/pi*atan(kap*ufinalin(lam,x0))+2
end
function APPatanvfinal1P1(x0)
lam=plusNzeros(x0)[1]
return 1/pi*atan(kap*vfinalin(lam,x0))
end
function APPatanufinal3P2(x0)
lam=plusNzeros(x0)[2]
return 1/pi*atan(kap*ufinalin(lam,x0))+2
end
function APPatanvfinal1P2(x0)
lam=plusNzeros(x0)[2]
return 1/pi*atan(kap*vfinalin(lam,x0))
end
function APPatanvfinal2P2(x0)
lam=plusNzeros(x0)[2]
return -1/pi*atan(kap*vfinalin(lam,x0))+1
end
#Plots.plot!(x0->APPatanvfinal1P1(x0)-APPatanufinal3P1(x0), x0->APPatanvfinal1P1(x0)+APPatanufinal3P1(x0), range(st,15,length=50) )
#Plots.plot!(x0->APPatanvfinal1P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal1P2(x0)+APPatanufinal3P2(x0), range(st,przec2-1e-7,length=50) )
#Plots.plot!(x0->APPatanvfinal2P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal2P2(x0)+APPatanufinal3P2(x0), range(przec2+1e-7,15,length=50) )
Out[38]:
APPatanvfinal2P2 (generic function with 1 method)
In [39]:
### PRE COMPUTING SHELL CROSSING
function SHELLatanufinal3(x0)
lam=lamshell(x0)
return 1/pi*atan(kap*ufinalin(lam,x0))+2
end
function SHELLatanvfinal1(x0)
lam=lamshell(x0)
return 1/pi*atan(kap*vfinalin(lam,x0))
end
#4.895
x0tab=range(4.895,15,length=150)
shellu=SHELLatanufinal3.(x0tab)
shellv=SHELLatanvfinal1.(x0tab)
SHELLu3 = linear_interpolation(x0tab, shellu)
SHELLv1 = linear_interpolation(x0tab, shellv)
Plots.plot(x0->SHELLv1(x0)-SHELLu3(x0), x0->SHELLv1(x0) + SHELLu3(x0), x0tab )
#Plots.plot(x0->SHELLatanvfinal1(x0)-SHELLatanufinal3(x0), x0->SHELLatanvfinal1(x0)+SHELLatanufinal3(x0), range(4.9,15,length=50), color=:violet )
Out[39]:
In [40]:
Plots.plot(x0tab, x0->ufinalin(lamshell(x0),x0))
Plots.plot!(x0tab, x0->vfinalin(lamshell(x0),x0))
Out[40]:
In [41]:
Plots.plot( range(4.895,7,length=150), x0->lamshell(x0))
Out[41]:
In [42]:
#Plots.plot(x0->APPatanvfinal1P1(x0)-APPatanufinal3P1(x0), x0->APPatanvfinal1P1(x0)+APPatanufinal3P1(x0), range(st,15,length=50), color=:green )
#Plots.plot!(x0->APPatanvfinal1P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal1P2(x0)+APPatanufinal3P2(x0), range(st,przec2-1e-7,length=50), color=:red )
#Plots.plot!(x0->APPatanvfinal2P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal2P2(x0)+APPatanufinal3P2(x0), range(przec2+1e-7,15,length=50), color=:red )
#Plots.plot!(x0->SHELLv1(x0)-SHELLu3(x0), x0->SHELLv1(x0) + SHELLu3(x0), x0tab, color=:black, aspectratio=1 )
In [43]:
####### POWIERZCHNIA POCZATKOWA
function atanufinal(lam, x0)
return 1/pi*atan(kap*ufinalin(lam,x0))
end
function atanufinal2(lam, x0)
return -1/pi*atan(kap*ufinalin(lam,x0))+1
end
function atanufinal3(lam, x0)
return 1/pi*atan(kap*ufinalin(lam,x0))+2
end
function atanvfinal(lam, x0)
return 1/pi*atan(kap*vfinalin(lam,x0))
end
function atanvfinal2(lam, x0)
return -1/pi*atan(kap*vfinalin(lam,x0))+1
end
function atanvfinal3(lam, x0)
return 1/pi*atan(kap*vfinalin(lam,x0))+2
end
function test1(x0)
return lamstar2(x0, 0) -lamstar_zero1
end
infOUTER=find_zero(test1,5)
function test2(x0)
return lamstar2(x0, 0) -lamstar_zero2
end
infINNER=find_zero(test2,1)
x0ta1 = range(1e-10, infINNER-1e-7,length=150)
x0ta2= range(infINNER+1e-7, infOUTER-1e-7, length=150)
x0ta3=range(infOUTER+1e-7,15, length=150)
x0ta=vcat(x0ta1,x0ta2,x0ta3)
upocz1= atanufinal3.(0, x0ta1)
upocz2= atanufinal2.(0, x0ta2)
upocz3=atanufinal.(0, x0ta3)
UPOCZ = linear_interpolation(x0ta, vcat(upocz1,upocz2,upocz3))
vpocz1 = atanvfinal.(0,x0ta)
VPOCZ = linear_interpolation(x0ta, vpocz1)
Plots.plot( x0->VPOCZ(x0) - UPOCZ(x0), x0-> VPOCZ(x0)+UPOCZ(x0), x0ta )
┌ Warning: At t=29.1483689616043, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64). └ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600 ┌ Warning: At t=29.148368893283475, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64). └ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600 ┌ Warning: At t=29.148368899417058, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64). └ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600 ┌ Warning: At t=29.148369021174226, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64). └ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600
Out[43]:
In [44]:
################# TRAJEKTORIA X0=10
Ax0=10
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)
vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)
tab1_A = range(-200,ulamsin1-10e-3,length=50)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)
tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamAa=tablamA
utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)
tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])
vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)
tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])
utrajA=linear_interpolation(tablamA, tabutabA );
vtrajA=linear_interpolation(tablamA, tabvtabA );
########## TRAJEKTORIA X0=5
Ax0=5
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)
vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)
tab1_A = range(-200,ulamsin1-10e-3,length=50)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)
tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamBb=tablamA
utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)
tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])
vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)
tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])
utrajB=linear_interpolation(tablamA, tabutabA );
vtrajB=linear_interpolation(tablamA, tabvtabA );
################## TRAJEKTORIA X0=0
Ax0=1e-6
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)
vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)
tab1_A = range(-200,ulamsin1-10e-3,length=50)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 200,length=50)
tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamCc=tablamA
utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)
tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])
vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)
tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])
utrajC=linear_interpolation(tablamA, tabutabA );
vtrajC=linear_interpolation(tablamA, tabvtabA );
In [45]:
################## TRAJEKTORIA X0=15
Ax0=15
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)
vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)
tab1_A = range(-200,ulamsin1-10e-3,length=150)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)
tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamDd=tablamA
utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)
tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])
vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)
tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])
utrajD=linear_interpolation(tablamA, tabutabA );
vtrajD=linear_interpolation(tablamA, tabvtabA );
In [46]:
################## TRAJEKTORIA X0=11
Ax0=11
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)
vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)
tab1_A = range(-200,ulamsin1-10e-3,length=150)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)
tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamEe=tablamA
utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)
tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])
vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)
tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])
utrajE=linear_interpolation(tablamA, tabutabA );
vtrajE=linear_interpolation(tablamA, tabvtabA );
In [67]:
######### DIAGRAM
#plotlyjs()
gr()
############# APPARENT DOLNY
lwa=1.4
cap=:magenta
Plots.plot(l->vdolnyA(l)-udolnyA(l),l->vdolnyA(l)+udolnyA(l) , tapA, aspectratio=1, color=cap, label=L"\mathrm{first} \, \mathrm{AH}", lw=lwa )
l1=first(tapA)
l2=first(tapB)
Plots.plot!([vdolnyA(l1)-udolnyA(l1),vdolnyB(l2)-udolnyB(l2) ] ,[vdolnyA(l1)+udolnyA(l1),vdolnyB(l2)+udolnyB(l2)] , aspectratio=1,
color=cap, label=false, lw=lwa )
Plots.plot!(l->vdolnyB(l)-udolnyB(l),l->vdolnyB(l)+udolnyB(l) , tapB, aspectratio=1, color=cap, label=false, lw=lwa )
########## SHELL CROSSING
Plots.plot!(x0->SHELLv1(x0)-SHELLu3(x0), x0->SHELLv1(x0) + SHELLu3(x0), x0tab, color=:black,
label=L"\mathrm{sh.} \, \mathrm{cross.} \, \mathrm{singularities}" )
#### POW POCZATKOWA
Plots.plot!( x0->VPOCZ(x0) - UPOCZ(x0), x0-> VPOCZ(x0)+UPOCZ(x0), x0ta, color=:black, ls=:dashdot, label=L"\mathrm{initial} \, \mathrm{surface}" )
################### TRAJEKTORIE
lw1=0.6
Plots.plot!( l -> vtrajC(l) - utrajC(l),l -> vtrajC(l) + utrajC(l),tablamCc , aspectratio=1, color=:green, label=L"x_0=0", lw=lw1 )
Plots.plot!( l -> vtrajB(l) - utrajB(l),l -> vtrajB(l) + utrajB(l),tablamBb , aspectratio=1, color=:blue, label=L"x_0=5", lw=lw1 )
Plots.plot!( l -> vtrajA(l) - utrajA(l),l -> vtrajA(l) + utrajA(l), tablamAa, aspectratio=1, color=:red, label=L"x_0=10", lw=lw1 )
Plots.plot!( l -> vtrajE(l) - utrajE(l),l -> vtrajE(l) + utrajE(l),tablamEe , aspectratio=1, color=:orange,
linewidth=1, label=L"x_0=11", lw=lw1)
Plots.plot!( l -> vtrajD(l) - utrajD(l),l -> vtrajD(l) + utrajD(l),tablamDd , aspectratio=1, color=:brown,
linewidth=1, label=L"x_0=15", lw=lw1)
Out[67]:
In [68]:
########## ATRYBUTY
Plots.plot!(xlabel=L"\tilde{v} - \tilde{u}",
ylabel=L"\tilde{v} + \tilde{u}")
Plots.plot!(xlims=(-3.25,3.5), ylims=(-1.25,5.15), grid=false, xticks=-3:4:1, yticks=-1:6:5, legendfontsize=6,
xtickfontsize=6,ytickfontsize=6, xguidefontsize=10,yguidefontsize=10 )
lens!([-2, -1.5], [1.55, 2.05]; inset=(1, bbox(0.51, 0.5,0.2, 0.2)),
subplot=2, ticks=false, framestyle=:box, ls=:dash, lw=0.5 , lc=:grey, aspectratio=1)
Out[68]:
In [69]:
Plots.savefig("diagNONHOMOu75v15.svg")
Out[69]:
"C:\\Users\\mihalbobula\\Desktop\\ew_final_przec\\diagNONHOMOu75v15.svg"
In [70]:
############# NUMERYCZNIE
using DifferentialEquations
#x01=5
lfin=deninf(5)+0.474
function deltaNUM(l1,x0)
function rowdelta(du, u, p, l)
du[1]=-2*sin(2*beta(l, Beta0(x0)))*u[1]-x(l, x0)*cos(2*beta(l, Beta0(x0)))*u[1]^2
end
u0=[delta0(x0)]
lspan=(0,20 )
condition(u,t,integrator) = u[1] - 1e9 # Is zero when u[3] = 10
affect!(integrator) = terminate!(integrator)
cb = ContinuousCallback(condition,affect!)
prob=ODEProblem(rowdelta,u0, lspan,callback = cb, reltol=1e-7,abstol=1e-7 )
sol1=solve(prob)
return sol1(l1)[1]
end
function lamshell(x0)
function test(l1)
return deltaNUM(l1,x0)-1e8
end
return find_zero(test,(0,100) )[1]
end
#deltaNUM(10,5)
#lamshell(24.5)
@time Plots.plot( range(5,20,length=150), x0->lamshell(x0) )
UndefVarError: `deninf` not defined Stacktrace: [1] top-level scope @ In[70]:6